home *** CD-ROM | disk | FTP | other *** search
/ CD School House 9 / CD School House 9.0 - Wayzata Technology (1994).iso / pc / games / mac / __adventureland__ / __adventure_helpers__ / gurps__3rd_edition / card_8557.txt < prev    next >
Text File  |  1991-01-08  |  3KB  |  165 lines
  1. -- card: 8557 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 4000
  4. -- background id: 4234
  5. -- name: Age
  6. ----- HyperTalk script -----
  7. on openCard
  8.   push recent card
  9.   set the scroll of card field "Age Field" to 0
  10. end OpenCard
  11.  
  12.  
  13.  
  14.  
  15. -- part 6 (field)
  16. -- low flags: 01
  17. -- high flags: 0007
  18. -- rect: left=223 top=107 right=326 bottom=263
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 0 / 0
  21. -- text alignment: 0
  22. -- font id: 0
  23. -- text size: 12
  24. -- style flags: 0
  25. -- line height: 16
  26. -- part name: Age Field
  27. ----- HyperTalk script -----
  28. on mouseUp
  29.   put True into popper
  30.   set lockText of the target to false
  31.   repeat two times
  32.     click at the clickLoc
  33.   end repeat
  34.   set lockText of the target to true
  35.   put selection into disadv
  36.   put (selection-50)*3 into disadvp
  37.   put "Age: "&disadv&" yrs old" into disadv
  38.   answer "Accept "& disadv &" Cost: "& disadvp &"?" with "Accept" or "Reject"
  39.   if it="Accept" then
  40.     ExD disadv,"Age",(0-disadvp)
  41.     put False into popper
  42.   end if
  43.   if popper then
  44.     visual effect iris close
  45.     pop card
  46.   end if
  47. end mouseUp
  48.  
  49.  
  50.  
  51. -- part 7 (button)
  52. -- low flags: 00
  53. -- high flags: A003
  54. -- rect: left=293 top=177 right=199 bottom=393
  55. -- title width / last selected line: 0
  56. -- icon id / first selected line: 0 / 0
  57. -- text alignment: 1
  58. -- font id: 0
  59. -- text size: 12
  60. -- style flags: 0
  61. -- line height: 16
  62. -- part name: Cancel
  63. ----- HyperTalk script -----
  64. on mouseUp
  65.   visual effect iris close
  66.   go to card "Disadvantage Card"
  67. end mouseUp
  68.  
  69.  
  70.  
  71. -- part 8 (field)
  72. -- low flags: 01
  73. -- high flags: 0000
  74. -- rect: left=12 top=52 right=103 bottom=497
  75. -- title width / last selected line: 0
  76. -- icon id / first selected line: 0 / 0
  77. -- text alignment: 0
  78. -- font id: 0
  79. -- text size: 12
  80. -- style flags: 0
  81. -- line height: 16
  82. -- part name: 
  83.  
  84.  
  85. -- part 9 (field)
  86. -- low flags: 01
  87. -- high flags: 0000
  88. -- rect: left=214 top=29 right=53 bottom=264
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 0 / 0
  91. -- text alignment: 0
  92. -- font id: 2
  93. -- text size: 18
  94. -- style flags: 256
  95. -- line height: 24
  96. -- part name: 
  97.  
  98.  
  99. -- part contents for card part 6
  100. ----- text -----
  101. 51
  102. 52
  103. 53
  104. 54
  105. 55
  106. 56
  107. 57
  108. 58
  109. 59
  110. 60
  111. 61
  112. 62
  113. 63
  114. 64
  115. 65
  116. 66
  117. 67
  118. 68
  119. 69
  120. 70
  121. 71
  122. 72
  123. 73
  124. 74
  125. 75
  126. 76
  127. 77
  128. 78
  129. 79
  130. 80
  131. 81
  132. 82
  133. 83
  134. 84
  135. 85
  136. 86
  137. 87
  138. 88
  139. 89
  140. 90
  141. 91
  142. 92
  143. 93
  144. 94
  145. 95
  146. 96
  147. 97
  148. 98
  149. 99
  150. 100
  151.  
  152.  
  153.  
  154.  
  155.  
  156.  
  157.  
  158.  
  159. -- part contents for card part 8
  160. ----- text -----
  161.    Your character is over 50 years old when created.  You receive three points for every year over 50.  You must roll on the aging table for each year of age over 50.
  162.  
  163. -- part contents for card part 9
  164. ----- text -----
  165. Age